home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1999 March / EnigmA AMIGA RUN 35 (1999)(G.R. Edizioni)(IT)[!][issue 1999-03].iso / earcd / -archivi / -recent2 / gaplib.lha / GAPLib_Beta / diagnostic / FlipTestTest.c < prev    next >
C/C++ Source or Header  |  1998-12-13  |  892b  |  71 lines
  1. #include <stdio.h>
  2. #include <stdlib.h>
  3. #include <GAP.h>
  4.  
  5. static unsigned char testdata[3][8] = {
  6.     {0,0,0,0,0,0,0,0},
  7.     {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
  8.     {0xAA,0xAA,0xAA,0xAA,0xAA,0xAA,0xAA,0xAA}
  9. };
  10.  
  11.  
  12. int main(void)
  13. {
  14. int bugs=0,i;
  15.  
  16. for(i=0;i!=64;i++) {
  17.     if(Testbit(testdata[0],i)) {
  18.         bugs++;
  19.     }
  20. }
  21.  
  22. for(i=0;i!=64;i++) {
  23.     if(!Testbit(testdata[1],i)) {
  24.         bugs++;
  25.     }
  26. }
  27.  
  28. if(!Testbit(testdata[2],0)) {
  29.     bugs++;
  30. }
  31.  
  32. if(Testbit(testdata[2],1)) {
  33.     bugs++;
  34. }
  35.  
  36. Flip(testdata[0],0);
  37. Flip(testdata[0],7);
  38. Flip(testdata[0],8);
  39. Flip(testdata[0],13);
  40. if(!Testbit(testdata[0],0)) {
  41.     bugs++;
  42. }
  43.  
  44. if(!Testbit(testdata[0],7)) {
  45.     bugs++;
  46. }
  47.  
  48. if(!Testbit(testdata[0],8)) {
  49.     bugs++;
  50. }
  51.  
  52. if(!Testbit(testdata[0],13)) {
  53.     bugs++;
  54. }
  55.  
  56. for(i=0;i!=32;i++) {
  57.     Flip(testdata[2],i<<1);
  58. }
  59.  
  60. for(i=0;i!=8;i++) {
  61.     if(testdata[2][i]!=0) {
  62.         bugs++;
  63.     }
  64. }
  65.  
  66. printf("Flip & Testbit tests: %d errors.\n",bugs);
  67.  
  68. return(bugs);
  69. }
  70.  
  71.